/**
 *  @file DelMulValue.c
 *  @desc 实现双向链表的基本操作，并提供删除所有最小值结点的功能
 *        支持：尾插、头插、按位置插入、删除、打印等操作
 *  @author WangBlue(wangjiping596@gmail.com)
 *  @date 2025-07-22 16:10
 *  @version 1.0
 */

#include <stdio.h>
#include <stdlib.h>

// ------------------------- 结构体定义 -------------------------

/**
 * @brief 双向链表结点结构体定义
 */
typedef struct node {
    int data;               ///< 数据域
    struct node *next;      ///< 指向下一个结点
    struct node *pre;       ///< 指向上一个结点
} node, *link;

// ------------------------- 基础操作函数 -------------------------

/**
 * @brief 创建一个新结点
 * @param value 要存储的数据
 * @return 成功返回新结点指针，失败返回 NULL
 */
link createNode(int value) {
    link newNode = (link) malloc(sizeof(node));
    if (newNode == NULL) return NULL;

    newNode->next = NULL;
    newNode->pre  = NULL;
    newNode->data = value;

    return newNode;
}

/**
 * @brief 初始化双向链表（带头结点）
 * @param head 链表头指针地址（一级指针）
 */
void initNode(link *head) {
    link newNode = (link) malloc(sizeof(node));
    if (newNode == NULL) return;

    newNode->next = NULL;
    newNode->pre  = NULL;
    newNode->data = 0; // 头结点不使用 data 域
    *head = newNode;
}

// ------------------------- 插入操作函数 -------------------------

/**
 * @brief 使用头插法插入结点
 * @param head 头结点指针
 * @param value 要插入的数据
 */
void istHead(link head, int value) {
    link newNode = createNode(value);
    if (newNode == NULL) return;

    newNode->next = head->next;
    newNode->pre  = head;

    if (head->next != NULL) {
        head->next->pre = newNode;
    }
    head->next = newNode;
}

/**
 * @brief 使用尾插法插入结点
 * @param head 头结点指针
 * @param value 要插入的数据
 */
void istTail(link head, int value) {
    link cur = head;

    // 移动到最后一个结点
    while (cur->next != NULL) {
        cur = cur->next;
    }

    link newNode = createNode(value);
    if (newNode == NULL) return;

    cur->next = newNode;
    newNode->pre = cur;
}

// ------------------------- 打印链表 -------------------------

/**
 * @brief 从头到尾打印链表中的值（跳过头结点）
 * @param head 头结点指针
 */
void printList(link head) {
    if (head == NULL || head->next == NULL) return;

    link cur = head->next;
    while (cur != NULL) {
        printf("value is %d\n", cur->data);
        cur = cur->next;
    }
    printf("\n");
}

// ------------------------- 删除操作函数 -------------------------

/**
 * @brief 删除链表中指定位置的结点（位置从 1 开始）
 * @param head 头结点指针
 * @param pos 要删除的逻辑位置（从 1 开始）
 */
void delByPos(link head, int pos) {
    if (head == NULL || head->next == NULL) return;

    int idx = 1;
    link cur = head->next;

    while (cur != NULL && idx < pos) {
        cur = cur->next;
        idx++;
    }

    if (cur == NULL) return;

    if (cur->pre != NULL) {
        cur->pre->next = cur->next;
    }
    if (cur->next != NULL) {
        cur->next->pre = cur->pre;
    }

    free(cur);
}

/**
 * @brief 在链表第 pos 个位置插入值（等价于在第 pos 个结点前插入）
 * @param head 头结点指针
 * @param value 要插入的值
 * @param pos 插入位置（从 1 开始）
 */
void insertByPos(link head, int value, int pos) {
    if (head == NULL || pos < 1) return;

    link cur = head;
    int idx = 0;
    while (cur != NULL && idx < pos - 1) {
        cur = cur->next;
        idx++;
    }

    if (cur == NULL) return;

    link newNode = createNode(value);
    if (newNode == NULL) return;

    newNode->next = cur->next;
    newNode->pre = cur;

    if (cur->next != NULL) {
        cur->next->pre = newNode;
    }
    cur->next = newNode;
}

/**
 * @brief 删除链表中所有值为最小值的结点
 * @param head 头结点指针
 * @note 会遍历两次链表：
 *       第一次：找到最小值
 *       第二次：删除所有等于最小值的结点
 */
void delMulMinValue(link head) {
    if (head == NULL || head->next == NULL) return;

    // ---------- 第一次遍历：找到最小值 ----------
    link cur = head->next;
    int minNode = cur->data;
    while (cur != NULL) {
        if (cur->data < minNode) {
            minNode = cur->data;
        }
        cur = cur->next;
    }

    // ---------- 第二次遍历：删除所有等于最小值的结点 ----------
    link tempCur = head->next;
    while (tempCur != NULL) {
        link next = tempCur->next;
        if (tempCur->data == minNode) {
            if (tempCur->next != NULL) {
                tempCur->next->pre = tempCur->pre;
            }
            if (tempCur->pre != NULL) {
                tempCur->pre->next = tempCur->next;
            }
            free(tempCur);
        }
        tempCur = next;
    }
}

// ------------------------- 主函数测试 -------------------------

int main() {
    link head = NULL;
    initNode(&head);

    // 插入重复最小值
    istTail(head, 1);
    istTail(head, 1);
    istTail(head, 1);
    istTail(head, 2);
    istTail(head, 3);

    // 删除所有最小值（值为1的结点）
    delMulMinValue(head);

    // 打印结果应为：2, 3
    printList(head);

    return 0;
}
